Write a FORTRAN program find prime number 100 to 999